(mouse-drag-throw): Bind adjusted-mouse-delta.

diff --git a/lisp/mouse-drag.el b/lisp/mouse-drag.el
index f8196c75de3d621b0742384d37aad531d9e99ff3..3f41d9f18fd90d82fad1e5dd53f2c4ec025da981 100644 (file)
--- a/lisp/mouse-drag.el
+++ b/lisp/mouse-drag.el
@@ -205,6 +205,7 @@ To test this function, evaluate:
         col mouse-col-delta window-last-col
         (scroll-col-delta 0)
         adjusted-mouse-col-delta
+        adjusted-mouse-delta
         ;; be conservative about allowing horizontal scrolling
         (col-scrolling-p (mouse-drag-should-do-col-scrolling)))
     (select-window start-window)